function B = readseries(name, runs, start)

if nargin < 3
  start = 1;
end

if nargin < 2
  runs = 1;
end

B = [];
for i = 0:runs-1
  clear A;
  eval([name '_' num2str(start+i)]);
  B = [B; A];
end
